Imports System.Data.OleDb

Public Class AbstractDao
    Public Sub New()

    End Sub
    Protected Function ConnectionData() As OleDbConnection
        Dim strCn As String
        strCn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = TruongHoc.mdb"
        Dim cn As New OleDbConnection(strCn)
        cn.Open()
        Return cn
    End Function
End Class
